home *** CD-ROM | disk | FTP | other *** search
/ Aminet 40 / Aminet 40 (2000)(Schatztruhe)[!][Dec 2000].iso / Aminet / util / boot / BlizKick.lha / BlizKick / Modules / BBlank.ASM < prev    next >
Assembly Source File  |  2000-09-04  |  2KB  |  51 lines
  1. ; FILE: Source:modules/BBlank.ASM          REV: 2 --- BorderBlank
  2.  
  3. *
  4. * Modified by Harry Sintonen. Changes by me are marked with ;hs comment.
  5. *
  6.  
  7. ;
  8. ; BorderBlank-Module for BlizKick
  9. ; ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  10. ; Written by Jens Lorenz.
  11. ; This source code is Public Domain.
  12.  
  13.         incdir  "Include:"
  14.         include "blizkickmodule.i"              ; Some required...
  15.  
  16. _LVOOpenLibraryTagged   EQU   -$32A
  17. _LVOCloseLibrary        EQU   -$19E
  18.  
  19.         SECTION MODULE,CODE
  20. _DUMMY_LABEL
  21.  BK_MOD BKMF_SingleMode,_end,(RTF_COLDSTART)<<24+39<<16+NT_UNKNOWN<<8+(256-48),_name,_idstr,_init  ;hs
  22. ; Singlemode on,
  23. ; COLDSTART module, requires KS V39.x or better, module type NT_UNKNOWN, priority -48.
  24. ; before BootMenu -> in BootMenu BBlank already activated
  25.  
  26. ;hs  Note that if you need to have negative priority (-pri) you *must* use
  27. ;hs  +(256-pri). For example to get priority -48 use +(256-48).
  28.  
  29. _init   move.l  (4).w,a6
  30.         moveq   #1,d0
  31.         jsr     _LVOOpenLibraryTagged(a6)       ; open graphics.library
  32.         tst.l   d0                              ;hs Need to be tested!
  33.         beq.b   .exit                           ; sorry, but we need the gfx-lib
  34.         move.l  d0,a1
  35.  
  36.         bset.b  #5,$1E3(a1)                     ; set the magic bit in bp3bits of gfxbase
  37. * RemakeDisplay() not needed -> no Screen open
  38.  
  39.         jmp     _LVOCloseLibrary(a6)            ; close the gfx-lib ;hs exit
  40.  
  41. .exit   rts
  42.  
  43. _name   dc.b    'BBlank',0
  44. _idstr  dc.b    'BBlank 1.0 (8.4.97)',0
  45.         CNOP    0,2
  46. _end
  47.  
  48.         SECTION VERSION,DATA
  49.  
  50.         dc.b    '$VER: BBlank_MODULE 1.0 (8.4.97)',0
  51.